home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / dviware / ln03 / rmcs / local.mf < prev    next >
Text File  |  1990-10-01  |  7KB  |  188 lines
  1. %
  2. %--------------------------------------------------------------------------
  3. % This file can be loaded after PLAIN.MF.
  4. % It introduces conventions that are commonly used at RMCS.
  5. %--------------------------------------------------------------------------
  6. base_version:=base_version&"/RMCS 08-AUGUST-1989";
  7.  
  8. %
  9. %--------------------------------------------------------------------------
  10. % Define these for on-line graphics; necessary to set the VMS logical name
  11. % MF$TERM to be one of the strings "go140", "tek" or "gp" to support
  12. % the GraphOn, Tektronix or GraphicsPlus terminals, respectively.
  13. % The following values are appropriate for Tektronix 4010 etc,
  14. % since METAFONT doubles them before output as coordinates.
  15. %--------------------------------------------------------------------------
  16. screen_rows:=336; screen_cols:=512;
  17.  
  18.  
  19.  
  20. %
  21. %--------------------------------------------------------------------------
  22. % Some new internal commands from TEXHAX26.88
  23. %
  24. %     Submitted by Charles R. LaBrec
  25. %    crl@maxwell.physics.purdue.edu
  26. %--------------------------------------------------------------------------
  27. newinternal blacker_min;
  28. def define_whole_blacker_pixels(text t) = 
  29.     forsuffixes $=t: $:=hround($.#*hppp+blacker);
  30.         if $<=blacker_min-1: $:=blacker_min; fi endfor enddef;
  31. def define_whole_vertical_blacker_pixels(text t) =
  32.     forsuffixes $=t: $:=vround($.#*hppp+blacker);
  33.         if $<=blacker_min-1: $:=blacker_min _o_; fi endfor enddef;
  34. %
  35. %--------------------------------------------------------------------------
  36. %
  37. %--------------------------------------------------------------------------
  38. mode_def declnIII =        % DEC LN03 (Ricoh, write white)
  39.  proofing:=0;              % no, we're not making proofs
  40.  fontmaking:=1;              % yes, we are making a font
  41.  tracingtitles:=0;            % no, don't show titles in the log
  42.  pixels_per_inch:=300;        % rather obvious really
  43.  blacker:=0.2;              % make pens a bit blacker
  44. %blacker:=0.3;        % From John Sauter TeXHAX V88 #07
  45. %blacker:=0.65;        % he also gives this value, but bad for small fonts
  46. %blacker:=0.4;        % This value by BHK --- how's it look?
  47.  blacker_min:=2;        % minimum width of 2 pixels
  48. %fillin:=-0.2;              % darken diagonals a bit
  49. %fillin:=-0.4;        % From Stan (?) UCB - TeXHAX V87.32
  50.  fillin:=-0.6;        % BHK is trying this huge value!
  51.  o_correction:=0.5;            % don't overshoot as much
  52. enddef;
  53.  
  54. %
  55. %--------------------------------------------------------------------------
  56. %
  57. %--------------------------------------------------------------------------
  58. mode_def hpljII =        % Hewlett Packard (Canon SX write white)
  59.  proofing:=0;              % no, we're not making proofs
  60.  fontmaking:=1;              % yes, we are making a font
  61.  tracingtitles:=0;            % no, don't show titles in the log
  62.  pixels_per_inch:=300;        % rather obvious really
  63.  blacker:=0.2;              % make pens a bit blacker
  64.  blacker_min:=2;        % minimum width of 2 pixels
  65.  fillin:=-0.2;              % darken diagonals a bit
  66.  o_correction:=0.5;            % don't overshoot as much
  67. enddef;
  68.  
  69. %
  70. %--------------------------------------------------------------------------
  71. % Epson FX-1000 dot matrix printer (240 x 216 dpi)
  72. % From TUGboat 1987, vol 8, no 1, pp 29--33
  73. %--------------------------------------------------------------------------
  74. mode_def epson =        % 
  75.  proofing:=0;                   % no, we're not making proofs
  76.  fontmaking:=1;                 % yes, we are making a font
  77.  tracingtitles:=0;              % no, don't show titles at all
  78.  pixels_per_inch:=240;          % Epson high resolution
  79.  blacker:=0;                    % Epson is black enough
  80.  blacker_min:=2;        % minimum width of 2 pixels
  81.  fillin:=0;                     % Epson fills OK
  82.  o_correction:=.2;              % Epson overshoots too much
  83.  aspect_ratio:=9/10;            % Epson is actually 240 x 216 dpi
  84. enddef;
  85.  
  86. %
  87. %--------------------------------------------------------------------------
  88. %
  89. %--------------------------------------------------------------------------
  90. mode_def ibmnom =        % ibm mode: for the IBM3812 nominal
  91.  proofing:=0;            % no, we're not making proofs
  92.  fontmaking:=1;            % yes, we are making a font
  93.  tracingtitles:=0;        % no, don't show titles in the log
  94.  pixels_per_inch:=240;
  95.  blacker:=.2;            % (this value is conjectural)
  96.  blacker_min:=1;        % minimum width of 1 pixel
  97.  fillin:=-0.1;            % (ditto)
  98.  o_correction:=0.6;        % (ditto)
  99. enddef;
  100.  
  101. %
  102. %--------------------------------------------------------------------------
  103. %
  104. %--------------------------------------------------------------------------
  105. mode_def ibmulf =        % ibm mode: for the IBM3812 Ulf Holleberg
  106.  proofing:=0;            % no, we're not making proofs
  107.  fontmaking:=1;            % yes, we are making a font
  108.  tracingtitles:=0;        % no, don't show titles in the log
  109.  pixels_per_inch:=240;
  110.  blacker:=.4;            % (this value is conjectural)
  111.  fillin:=-0.2;            % (ditto)
  112.  o_correction:=0.4;        % (ditto)
  113. enddef;
  114.  
  115. %
  116. %--------------------------------------------------------------------------
  117. %
  118. %--------------------------------------------------------------------------
  119. mode_def ibm =            % ibm mode: for the IBM3820
  120.  proofing:=0;            % no, we're not making proofs
  121.  fontmaking:=1;            % yes, we are making a font
  122.  tracingtitles:=0;        % no, don't show titles in the log
  123.  pixels_per_inch:=240;
  124.  blacker:=.78;            % (this value is conjectural)
  125.  fillin:=0.25;            % (ditto)
  126.  o_correction:=.5;        % (ditto)
  127. enddef;
  128.  
  129.  
  130. %
  131. %--------------------------------------------------------------------------
  132. %
  133. %--------------------------------------------------------------------------
  134. mode_def ibmsch =        % ibm PC screen for Arbortext's PREVIEW
  135.  proofing:=0;            % no, we're not making proofs
  136.  fontmaking:=1;            % yes, we are making a font
  137.  tracingtitles:=0;        % no, don't show titles in the log
  138.  pixels_per_inch:=118;        %
  139.  blacker:=0;            % let it be
  140.  blacker_min:=1;        % minimum width of 1 pixel
  141.  fillin:=0;            % and do not compensate for diagonal fillin
  142.  o_correction:=.2;        % but don't overshoot much
  143. enddef;
  144.  
  145. %
  146. %--------------------------------------------------------------------------
  147. %
  148. %--------------------------------------------------------------------------
  149. mode_def ibmvga =        % ibm PC screen fonts for DVIVGA
  150.  proofing:=0;            % no, we're not making proofs
  151.  fontmaking:=1;            % yes, we are making a font
  152.  tracingtitles:=0;        % no, don't show titles in the log
  153.  pixels_per_inch:=110;        %
  154.  blacker:=0.3;            % blacker pens
  155.  blacker_min:=1;        % minimum width of 1 pixel
  156.  fillin:=0;            % and do not compensate for diagonal fillin
  157.  o_correction:=0.0;        % 
  158. enddef;
  159.  
  160. %
  161. %--------------------------------------------------------------------------
  162. % LAseventyfive mode: for DEC LA75 printer
  163. %--------------------------------------------------------------------------
  164. % 
  165. mode_def declalxxv =
  166.  proofing:=0;                    % no, we're not making proofs
  167.  fontmaking:=1;                  % yes, we are making a font
  168.  tracingtitles:=0;               % no, don't show titles in the log
  169.  pixels_per_inch:=144;           % pixels per inch
  170.  blacker:=0.3;                   % blacker pens
  171.  blacker_min:=1;        % minimum width of 1 pixel
  172.  fillin:=-0.1;                   % compensate for light diagonals
  173.  o_correction:=0.0               % overshoot
  174. enddef;
  175.  
  176.  
  177. %
  178. %--------------------------------------------------------------------------
  179. %
  180. %--------------------------------------------------------------------------
  181. mode_def laser =        % A convenient synonym for DEC LN03
  182.  declnIII_;
  183. enddef;
  184.  
  185. mode_def localfont =
  186.  declnIII_;
  187. enddef;
  188.